#lang planet neil/sicp

(load "stream-lib.scm")

;(define x 5)
(define (show x)
  (display x)
  (newline)
  x)

(define x (stream-map show (stream-enumerate-interval 0 10)))

